(Info-fontify-node): Fix previous change.

diff --git a/lisp/info.el b/lisp/info.el
index 8c3e591c65bf1c5f42df55c181d09bdd87ae2047..4019d235a76af920b856d18b6c3fa4b9be70f4db 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1771,7 +1771,7 @@ The alist key is the character the title is underlined with (?*, ?= or ?-).")
                                 nil t)
        (put-text-property (match-beginning 1) (match-end 1)
                           'face
-                          (assq (preceding-char) Info-title-face-alist))
+                          (cdr (assq (preceding-char) Info-title-face-alist)))
        (put-text-property (match-end 1) (match-end 2)
                           'invisible t))
       (goto-char (point-min))